home *** CD-ROM | disk | FTP | other *** search
/ BCI NET / BCI NET Dec 94.iso / archives / applications / patch / ps3btu.lha / 3.0bTuneUp / TuneUp-PageStream3.0b < prev   
Encoding:
Text File  |  1994-10-14  |  2.6 KB  |  62 lines

  1. ;PAGESTREAM 3.0b TUNEUP ONLINE UPDATE PATCH INSTALLATION SCRIPT
  2. ;COPYRIGHT ©1994 SOFT-LOGIK PUBLISHING CORPORATION
  3.  
  4. ;SEE IF PAGESTREAM3 AND SOFTLOGIK ARE ASSIGNED AND EVERYTHING EXISTS
  5. (set PGSdest (getassign "PageStream3" "a"))
  6. (set SLdest (getassign "SoftLogik" "a"))
  7. (if (OR (= PGSdest "") (= SLdest ""))
  8.     (abort "PageStream3: and/or SoftLogik: are not assigned. You must properly install PageStream3 before applying this update patch.")
  9. )
  10. (set @default-dest PGSdest)
  11.     (if (<> (exists "PageStream3:PageStream3") 1)
  12. (abort "PageStream3 is not in the PageStream3: directory. You must properly install PageStream3 before applying this update patch.")
  13. )
  14. (if (<> (exists "SoftLogik:Libs") 2)
  15.     (abort "The SoftLogik:Libs directory is missing. You must properly install PageStream3 before applying this update patch.")
  16. )
  17. (if (<> (exists "SoftLogik:Engines") 2)
  18.     (abort "The SoftLogik:Engines directory is missing. You must properly install PageStream3 before applying this update patch.")
  19. )
  20.  
  21. (message "\n\nThis will update your hard drive installation of PageStream 3.0b. This tuneup should only be used if you had PageStream 3.0a and then upgraded to 3.0b via the first version of the 3.0b patch.\n\nYour original PageStream3 disks will not be modified by this update.")
  22.  
  23. ;COPY THE LHEX PROGRAM TO RAM:
  24. (copyfiles
  25.     (source "PageStream3Disk1:lhex")
  26.     (dest "ram:")
  27.     (nogauge)
  28. )
  29.  
  30. ;UPDATE LIBS
  31. (working "Patching Library...")
  32. (run "ram:lhex >NIL: <NIL: -qfw=ram: x LibsPatch.lha")
  33. (delete "LibsPatch.LHA" (safe))
  34. (run "spatch >NIL: <NIL: -oSoftLogik:Libs/app.library -pram:app.pch SoftLogik:Libs/SoftLogik_App.library")
  35. (if (exists "SoftLogik:Libs/app.library")
  36.     (
  37.         (delete "SoftLogik:Libs/SoftLogik_App.library")
  38.         (rename "SoftLogik:Libs/app.library" "SoftLogik:Libs/SoftLogik_App.library")
  39.     )
  40. )
  41. (delete "ram:app.pch" (safe))
  42.  
  43. ;UPDATE FONT ENGINES
  44. (working "Installing Updated PS.font Engine...")
  45. (run "ram:lhex >NIL: <NIL: -qfw=SoftLogik:Engines x Engines.lha")
  46. (delete "Engines.LHA" (safe))
  47.  
  48. ;INSTALL FONTLISTv2ANALYZER
  49. (working "Installing FONTLISTv2Analyzer...")
  50. (run "ram:lhex >NIL: <NIL: -qfw=PageStream3: x FLister.LHA")
  51. (delete "FLister.LHA" (safe))
  52.  
  53. ;REMOVE THE LHARC PROGRAM
  54. (delete "ram:lhex" (safe))
  55. (delete "spatch" (safe))
  56. (delete "Install-PageStream3.0b.info" (safe))
  57.  
  58. (message "You MUST update any font path containing a PostScript font. Run PageStream3, choose Settings/Fonts, select the StudioFonts path and click on the Update gadget. Repeat for the SerialsFonts path, IQEfonts path and any other PostScript font paths you may have.\n\nThis is important!\n\nNot doing this will lead to problems.")
  59.  
  60. ;GEE, THAT WAS FUN
  61. (exit "PageStream 3.0b tuned up!")
  62.